home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Meeting Pearls 2
/
Meeting Pearls Vol. II (1995)(GTI - Schatztruhe)[!].iso
/
Pearls
/
tex
/
PasTeX14-BETA-6
/
SpecialHost
/
Source
/
postglue.asm
< prev
next >
Wrap
Assembly Source File
|
1994-05-27
|
2KB
|
120 lines
**
** SpecialHost for PasTeX
**
** Copyright © by Olaf Barthel & Georg Heßmann
**
csect text,0,0,1,2
xdef _PScreateact
_PScreateact:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a1
jsr -30(a6)
move.l (sp)+,a6
rts
xdef _PSdeleteact
_PSdeleteact:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
jsr -36(a6)
move.l (sp)+,a6
rts
xdef _PSintstring
_PSintstring:
move.l a6,-(sp)
move.l _PostBase(a4),a6
movem.l 8(sp),a0/a1
movem.l 16(sp),d0/d1
jsr -42(a6)
move.l (sp)+,a6
rts
xdef _PSsignalint
_PSsignalint:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
move.l 12(sp),d0
jsr -48(a6)
move.l (sp)+,a6
rts
xdef _PSsignalfpe
_PSsignalfpe:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
jsr -54(a6)
move.l (sp)+,a6
rts
xdef _PSerror
_PSerror:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
move.l 12(sp),d0
jsr -60(a6)
move.l (sp)+,a6
rts
xdef _PSallocvm
_PSallocvm:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
move.l 12(sp),d0
jsr -66(a6)
move.l (sp)+,a6
rts
xdef _PSvreftoptr
_PSvreftoptr:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
move.l 12(sp),d0
jsr -72(a6)
move.l (sp)+,a6
rts
xdef _PSsetdevice
_PSsetdevice:
move.l a6,-(sp)
move.l _PostBase(a4),a6
movem.l 8(sp),a0/a1
jsr -78(a6)
move.l (sp)+,a6
rts
xdef _PSerrstr
_PSerrstr:
move.l a6,-(sp)
move.l _PostBase(a4),a6
move.l 8(sp),a0
move.l 12(sp),d0
jsr -84(a6)
move.l (sp)+,a6
rts
csect __MERGED,DATA
xref _PostBase
end